PC Users 1999 April/Cd Pc Users extra 19 abril 1999.iso/Internet/HTML/HTMLTool/_SETUP.1/HTMLTOOL.exe/0/RCDATA/TOPTIONSDIALOG/TOPTIONSDIALOG.txt

Text File | 1999-02-01 | 25.5 KB | 1,022 lines

object OptionsDialog: TOptionsDialog
  Left = 584
  Top = 108
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Editor options'
  ClientHeight = 389
  ClientWidth = 442
  Color = clBtnFace
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  Position = poScreenCenter
  OnCreate = FormCreate
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel2: TPanel
    Left = 0
    Top = 348
    Width = 442
    Height = 41
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 0
    object OKButton: TButton
      Left = 245
      Top = 8
      Width = 75
      Height = 25
      Caption = 'OK'
      TabOrder = 0
      OnClick = OKButtonClick
    end
    object CancelButton: TButton
      Left = 333
      Top = 8
      Width = 75
      Height = 25
      Caption = 'Cancel'
      ModalResult = 2
      TabOrder = 1
    end
  end
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 442
    Height = 348
    ActivePage = HighlightingPage
    Align = alClient
    TabOrder = 1
    object OptionsPage: TTabSheet
      Caption = 'Options'
      object Label15: TLabel
        Left = 7
        Top = 253
        Width = 104
        Height = 13
        Alignment = taRightJustify
        Caption = 'Block Indent step size'
      end
      object Label16: TLabel
        Left = 22
        Top = 276
        Width = 89
        Height = 13
        Alignment = taRightJustify
        Caption = 'Word wrap column'
      end
      object Label11: TLabel
        Left = 196
        Top = 253
        Width = 62
        Height = 13
        Alignment = taRightJustify
        Caption = 'Tab Columns'
      end
      object DefTabStopLabel: TLabel
        Left = 179
        Top = 276
        Width = 79
        Height = 13
        Alignment = taRightJustify
        Caption = 'Default Tab stop'
      end
      object GroupBox4: TGroupBox
        Left = 8
        Top = 8
        Width = 417
        Height = 171
        Caption = 'Options'
        TabOrder = 0
        object Label13: TLabel
          Left = 12
          Top = 21
          Width = 72
          Height = 13
          Caption = 'Print options'
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label14: TLabel
          Left = 134
          Top = 21
          Width = 90
          Height = 13
          Caption = 'General options'
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object WrapLineBox: TCheckBox
          Left = 16
          Top = 35
          Width = 110
          Height = 17
          Caption = 'Wrap long lines'
          TabOrder = 0
          OnClick = SHIFTSelectBoxClick
        end
        object LineNosBox: TCheckBox
          Left = 16
          Top = 51
          Width = 110
          Height = 17
          Caption = 'Line numbers'
          TabOrder = 1
          OnClick = SHIFTSelectBoxClick
        end
        object FileNamBox: TCheckBox
          Left = 16
          Top = 67
          Width = 110
          Height = 17
          Caption = 'Title in header'
          TabOrder = 2
          OnClick = SHIFTSelectBoxClick
        end
        object DateBox: TCheckBox
          Left = 16
          Top = 83
          Width = 110
          Height = 17
          Caption = 'Date in header'
          TabOrder = 3
          OnClick = SHIFTSelectBoxClick
        end
        object PageNosBox: TCheckBox
          Left = 16
          Top = 99
          Width = 110
          Height = 17
          Caption = 'Page numbers'
          TabOrder = 4
          OnClick = SHIFTSelectBoxClick
        end
        object DispWrapBox: TCheckBox
          Left = 138
          Top = 35
          Width = 130
          Height = 17
          Caption = 'Word wrap'
          TabOrder = 5
          OnClick = SHIFTSelectBoxClick
        end
        object Panel6: TPanel
          Left = 128
          Top = 12
          Width = 2
          Height = 151
          BevelOuter = bvLowered
          Caption = 'Panel6'
          TabOrder = 6
        end
        object AutoIndentBox: TCheckBox
          Left = 138
          Top = 67
          Width = 130
          Height = 17
          Caption = 'Auto-indent'
          TabOrder = 7
          OnClick = SHIFTSelectBoxClick
        end
        object TabColBox: TCheckBox
          Left = 138
          Top = 83
          Width = 130
          Height = 17
          Caption = 'Smart tabs'
          TabOrder = 8
          OnClick = SHIFTSelectBoxClick
        end
        object WrapOverrideBox: TCheckBox
          Left = 138
          Top = 51
          Width = 130
          Height = 17
          Caption = 'Override wrapping'
          TabOrder = 9
          OnClick = SHIFTSelectBoxClick
        end
        object WordSelectBox: TCheckBox
          Left = 270
          Top = 83
          Width = 145
          Height = 17
          Caption = 'Word select'
          TabOrder = 10
          OnClick = SHIFTSelectBoxClick
        end
        object PrnSynHighlightBox: TCheckBox
          Left = 270
          Top = 99
          Width = 145
          Height = 17
          Caption = 'Syntax highlighting'
          TabOrder = 11
          OnClick = SHIFTSelectBoxClick
        end
        object TitleAsFilenameBox: TCheckBox
          Left = 270
          Top = 51
          Width = 145
          Height = 17
          Caption = 'Title as filename'
          TabOrder = 12
          OnClick = SHIFTSelectBoxClick
        end
        object BlockCursorBox: TCheckBox
          Left = 270
          Top = 67
          Width = 145
          Height = 17
          Caption = 'Block cursor for Overwrite'
          TabOrder = 13
          OnClick = SHIFTSelectBoxClick
        end
        object MarkWrapBox: TCheckBox
          Left = 270
          Top = 35
          Width = 145
          Height = 17
          Caption = 'Mark wrapped lines'
          TabOrder = 14
          OnClick = SHIFTSelectBoxClick
        end
        object SmartFillBox: TCheckBox
          Left = 138
          Top = 99
          Width = 130
          Height = 17
          Caption = 'Smart fill'
          TabOrder = 15
          OnClick = SHIFTSelectBoxClick
        end
        object UseTabBox: TCheckBox
          Left = 138
          Top = 115
          Width = 130
          Height = 17
          Caption = 'Use TAB character'
          TabOrder = 16
          OnClick = SHIFTSelectBoxClick
        end
        object CursorAfterEOLBox: TCheckBox
          Left = 270
          Top = 115
          Width = 145
          Height = 17
          Caption = 'Cursor beyond EOL'
          TabOrder = 17
          OnClick = SHIFTSelectBoxClick
        end
        object EdLineNosBox: TCheckBox
          Left = 138
          Top = 131
          Width = 130
          Height = 17
          Caption = 'Line numbers in gutter'
          TabOrder = 18
          OnClick = SHIFTSelectBoxClick
        end
      end
      object WrapColumnBox: TEdit
        Left = 118
        Top = 272
        Width = 25
        Height = 21
        TabOrder = 1
        Text = 'WrapColumnBox'
        OnExit = WrapColumnBoxExit
        OnKeyDown = WrapColumnBoxKeyDown
      end
      object IndentStepBox: TEdit
        Left = 118
        Top = 249
        Width = 25
        Height = 21
        TabOrder = 2
        Text = 'IndentStepBox'
        OnExit = IndentStepBoxExit
        OnKeyDown = WrapColumnBoxKeyDown
      end
      object GroupBox2: TGroupBox
        Left = 8
        Top = 182
        Width = 417
        Height = 59
        TabOrder = 3
        object Label7: TLabel
          Left = 16
          Top = 36
          Width = 59
          Height = 13
          Caption = 'Right margin'
        end
        object Label9: TLabel
          Left = 184
          Top = 36
          Width = 57
          Height = 13
          Caption = 'Gutter width'
        end
        object VisRMarginBox: TCheckBox
          Left = 16
          Top = 12
          Width = 121
          Height = 17
          Caption = 'Visible Right margin'
          TabOrder = 0
          OnClick = SHIFTSelectBoxClick
        end
        object RightMarginWidthBox: TEdit
          Tag = 2
          Left = 83
          Top = 32
          Width = 45
          Height = 21
          MaxLength = 3
          TabOrder = 1
          Text = '1'
          OnChange = LeftBorderWidthBoxChange
          OnKeyDown = LeftBorderWidthBoxKeyDown
        end
        object VisGutterBox: TCheckBox
          Left = 184
          Top = 12
          Width = 97
          Height = 17
          Caption = 'Visible Gutter'
          TabOrder = 2
          OnClick = SHIFTSelectBoxClick
        end
        object LeftBorderWidthBox: TEdit
          Tag = 1
          Left = 247
          Top = 32
          Width = 45
          Height = 21
          MaxLength = 3
          TabOrder = 3
          Text = '1'
          OnChange = LeftBorderWidthBoxChange
          OnKeyDown = LeftBorderWidthBoxKeyDown
        end
      end
      object ShowWrapColumnBox: TCheckBox
        Left = 6
        Top = 296
        Width = 137
        Height = 17
        Alignment = taLeftJustify
        Caption = 'Show word-wrap column'
        TabOrder = 4
        OnClick = SHIFTSelectBoxClick
      end
      object TabColumnsBox: TEdit
        Left = 264
        Top = 249
        Width = 160
        Height = 21
        TabOrder = 5
        Text = 'TabColumnsBox'
        OnExit = TabColumnsBoxExit
      end
      object DeftabBox: TEdit
        Left = 264
        Top = 272
        Width = 25
        Height = 21
        TabOrder = 6
        Text = 'DeftabBox'
        OnExit = DeftabBoxExit
      end
    end
    object HighlightingPage: TTabSheet
      Caption = 'Highlighting'
      object Label3: TLabel
        Left = 10
        Top = 7
        Width = 105
        Height = 13
        Caption = 'Current language style'
      end
      object ElementLabel: TLabel
        Left = 10
        Top = 24
        Width = 38
        Height = 13
        Caption = 'Element'
      end
      object FontNameLabel: TLabel
        Left = 9
        Top = 150
        Width = 21
        Height = 13
        Alignment = taRightJustify
        Caption = 'Font'
      end
      object FontSizeLabel: TLabel
        Left = 214
        Top = 150
        Width = 20
        Height = 13
        Alignment = taRightJustify
        Caption = 'Size'
      end
      object FGLabel: TLabel
        Left = 136
        Top = 37
        Width = 54
        Height = 13
        Caption = 'Foreground'
      end
      object BGLabel: TLabel
        Left = 136
        Top = 88
        Width = 58
        Height = 13
        Caption = 'Background'
      end
      object Label1: TLabel
        Left = 8
        Top = 176
        Width = 36
        Height = 13
        Alignment = taRightJustify
        Caption = 'Charset'
      end
      object LangNameBox: TEdit
        Left = 120
        Top = 3
        Width = 297
        Height = 21
        TabStop = False
        Enabled = False
        TabOrder = 0
        Text = 'LangNameBox'
      end
      object GroupBox1: TGroupBox
        Left = 304
        Top = 33
        Width = 113
        Height = 65
        Caption = 'Text attributes'
        TabOrder = 1
        object UseBoldBox: TCheckBox
          Tag = 1
          Left = 10
          Top = 13
          Width = 97
          Height = 17
          Caption = '&Bold'
          TabOrder = 0
          OnClick = UseBoldBoxClick
        end
        object UseItalicBox: TCheckBox
          Tag = 2
          Left = 10
          Top = 29
          Width = 97
          Height = 17
          Caption = '&Italic'
          TabOrder = 1
          OnClick = UseBoldBoxClick
        end
        object UseUnderlineBox: TCheckBox
          Tag = 3
          Left = 10
          Top = 45
          Width = 97
          Height = 17
          Caption = '&Underline'
          TabOrder = 2
          OnClick = UseBoldBoxClick
        end
      end
      object SynElementsBox: TListBox
        Left = 8
        Top = 38
        Width = 121
        Height = 99
        ItemHeight = 13
        TabOrder = 2
        OnClick = SynElementsBoxClick
      end
      object Panel1: TPanel
        Left = 8
        Top = 204
        Width = 417
        Height = 113
        BevelOuter = bvNone
        TabOrder = 3
        object FEditor: TSyntaxMemo
          Tag = 2
          Left = 0
          Top = 0
          Width = 417
          Height = 113
          Align = alClient
          ClipCopyFormats = [smTEXT, smRTF]
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Courier New'
          Font.Style = []
          HyperCursor = crDefault
          IndentStep = 1
          Margin = 2
          Lines.Strings = (
            'FEditor')
          Modified = False
          Options = [smoSyntaxHighlight, smoPrintWrap, smoPrintLineNos, smoPrintFilename, smoPrintDate, smoPrintPageNos, smoAutoIndent, smoTabToColumn, smoWordSelect, smoShowRMargin, smoShowGutter, smoShowWrapColumn, smoTitleAsFilename, smoBlockOverwriteCursor, smoShowWrapGlyph, smoColumnTrack]
          ReadOnly = True
          RightMargin = 80
          SaveFormat = sfTEXT
          SelStart = 0
          SelLength = 0
          SelTextColor = clWhite
          SelTextBack = clTeal
          TabDefault = 4
          TabOrder = 0
          TabStop = False
          Version = '2.01.17'
          VisiblePropEdPages = [ppOPTIONS, ppHIGHLIGHTING, ppKEYS, ppAUTOCORRECT, ppTEMPLATES]
          WrapAtColumn = 0
          OnMouseDown = EditorMouseDown
          ActiveParser = 1
        end
      end
      object FontSizeBox: TComboBox
        Left = 242
        Top = 146
        Width = 55
        Height = 21
        ItemHeight = 13
        Items.Strings = (
          '8'
          '9'
          '10'
          '11'
          '12'
          '14'
          '16'
          '18'
          '20'
          '22'
          '24'
          '26'
          '30')
        TabOrder = 4
        Text = 'FontSizeBox'
        OnChange = FontSizeBoxChange
      end
      object FontNameBox: TComboBox
        Left = 53
        Top = 146
        Width = 150
        Height = 21
        ItemHeight = 13
        TabOrder = 5
        Text = 'FontNameBox'
        OnChange = FontNameBoxChange
      end
      object DefCheckBox: TGroupBox
        Left = 304
        Top = 110
        Width = 114
        Height = 56
        Caption = 'Use defaults for'
        TabOrder = 6
        object UseDefForeBox: TCheckBox
          Tag = 1
          Left = 8
          Top = 16
          Width = 97
          Height = 17
          Caption = 'Foreground'
          TabOrder = 0
          OnClick = UseDefForeBoxClick
        end
        object UseDefBackBox: TCheckBox
          Left = 8
          Top = 33
          Width = 97
          Height = 17
          Caption = 'Background'
          TabOrder = 1
          OnClick = UseDefForeBoxClick
        end
      end
      object FontFamilyBox: TComboBox
        Left = 53
        Top = 171
        Width = 150
        Height = 21
        ItemHeight = 13
        TabOrder = 7
        Text = 'FontFamilyBox'
        OnChange = FontFamilyBoxChange
      end
    end
    object KeyMappingsPage: TTabSheet
      Caption = 'Key Assignments'
      object Panel3: TPanel
        Left = 0
        Top = 0
        Width = 434
        Height = 320
        Align = alClient
        BevelOuter = bvNone
        BorderWidth = 2
        TabOrder = 0
        object CommandsLabel: TLabel
          Left = 16
          Top = 16
          Width = 52
          Height = 13
          Caption = 'Commands'
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object UsesKeysLabel: TLabel
          Left = 245
          Top = 16
          Width = 50
          Height = 13
          Caption = 'Uses Keys'
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object CommandDescListBox: TListBox
          Left = 16
          Top = 32
          Width = 209
          Height = 273
          ExtendedSelect = False
          ItemHeight = 13
          TabOrder = 0
          OnClick = CommandDescListBoxClick
        end
        object CommandKeysListBox: TListBox
          Left = 241
          Top = 32
          Width = 185
          Height = 130
          ExtendedSelect = False
          ItemHeight = 13
          TabOrder = 1
          OnClick = CommandKeysListBoxClick
          OnExit = CommandKeysListBoxExit
        end
        object AddButton: TButton
          Left = 279
          Top = 170
          Width = 45
          Height = 21
          Caption = 'Add'
          TabOrder = 2
          OnClick = AddButtonClick
        end
        object DeleteButton: TButton
          Left = 379
          Top = 170
          Width = 45
          Height = 21
          Caption = 'Delete'
          TabOrder = 3
          OnClick = DeleteButtonClick
        end
        object EditButton: TButton
          Left = 329
          Top = 170
          Width = 45
          Height = 21
          Caption = 'Edit'
          TabOrder = 4
          OnClick = EditButtonClick
        end
      end
    end
    object AutoCorrectPage: TTabSheet
      Caption = 'Auto Correct'
      object Panel4: TPanel
        Left = 0
        Top = 0
        Width = 434
        Height = 320
        Align = alClient
        BevelOuter = bvNone
        BorderWidth = 2
        TabOrder = 0
        object ReplaceLabel: TLabel
          Left = 16
          Top = 16
          Width = 40
          Height = 13
          Caption = 'Replace'
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object WithLabel: TLabel
          Left = 160
          Top = 16
          Width = 22
          Height = 13
          Caption = 'With'
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object ActKeysLabel: TLabel
          Left = 195
          Top = 281
          Width = 47
          Height = 13
          Caption = 'Act key(s)'
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object AutoReplButton1: TButton
          Left = 16
          Top = 278
          Width = 65
          Height = 19
          Caption = 'Add'
          TabOrder = 0
          OnClick = AutoReplButton1Click
        end
        object AutoReplButton2: TButton
          Left = 104
          Top = 278
          Width = 65
          Height = 19
          Caption = 'Replace'
          TabOrder = 1
          OnClick = AutoReplButton2Click
        end
        object AutoReplBox: TListBox
          Left = 16
          Top = 32
          Width = 401
          Height = 213
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Courier New'
          Font.Style = []
          ItemHeight = 16
          Items.Strings = (
            'one'
            'three'
            'two')
          ParentFont = False
          Sorted = True
          Style = lbOwnerDrawFixed
          TabOrder = 2
          OnClick = AutoReplBoxClick
          OnDrawItem = AutoReplBoxDrawItem
          OnMeasureItem = AutoReplBoxMeasureItem
        end
        object ReplaceBox: TEdit
          Left = 16
          Top = 246
          Width = 137
          Height = 22
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Courier New'
          Font.Style = []
          ParentFont = False
          TabOrder = 3
          OnChange = ReplaceBoxChange
        end
        object WithBox: TEdit
          Left = 153
          Top = 246
          Width = 264
          Height = 22
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Courier New'
          Font.Style = []
          ParentFont = False
          TabOrder = 4
          OnChange = WithBoxChange
        end
        object AutoReplActBox: TEdit
          Left = 256
          Top = 277
          Width = 161
          Height = 21
          TabOrder = 5
          Text = 'AutoReplActBox'
          OnExit = AutoReplActBoxExit
        end
      end
    end
    object TemplatesPage: TTabSheet
      Caption = 'Code Templates'
      object Panel5: TPanel
        Left = 0
        Top = 0
        Width = 434
        Height = 320
        Align = alClient
        BevelOuter = bvNone
        BorderWidth = 2
        TabOrder = 0
        object NameLabel: TLabel
          Left = 16
          Top = 16
          Width = 28
          Height = 13
          Caption = 'Name'
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object DescLabel: TLabel
          Left = 160
          Top = 16
          Width = 53
          Height = 13
          Caption = 'Description'
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object HotKeyLabel: TLabel
          Left = 240
          Top = 292
          Width = 34
          Height = 13
          Caption = 'Hotkey'
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object TemplateValueLabel: TLabel
          Left = 16
          Top = 136
          Width = 68
          Height = 13
          Caption = 'Code template'
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object cteListBox: TListBox
          Left = 16
          Top = 32
          Width = 401
          Height = 73
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Courier New'
          Font.Style = []
          ItemHeight = 16
          Items.Strings = (
            'one'
            'three'
            'two')
          ParentFont = False
          Sorted = True
          Style = lbOwnerDrawFixed
          TabOrder = 0
          OnClick = cteListBoxClick
          OnDrawItem = AutoReplBoxDrawItem
          OnMeasureItem = AutoReplBoxMeasureItem
        end
        object cteNameBox: TEdit
          Left = 16
          Top = 106
          Width = 131
          Height = 22
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Courier New'
          Font.Style = []
          ParentFont = False
          TabOrder = 1
          Text = 'cteNameBox'
          OnChange = cteNameBoxChange
        end
        object cteDescBox: TEdit
          Left = 146
          Top = 106
          Width = 271
          Height = 22
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Courier New'
          Font.Style = []
          ParentFont = False
          TabOrder = 2
          Text = 'cteDescBox'
          OnChange = cteDescBoxChange
        end
        object cteSynMemoPanel: TPanel
          Left = 16
          Top = 151
          Width = 401
          Height = 129
          BevelOuter = bvNone
          TabOrder = 3
          object SyntaxMemo1: TSyntaxMemo
            Left = 0
            Top = 0
            Width = 401
            Height = 129
            Align = alClient
            ClipCopyFormats = [smTEXT, smRTF]
            Font.Color = clWindowText
            Font.Height = -13
            Font.Name = 'Courier New'
            Font.Style = []
            HyperCursor = crDefault
            IndentStep = 1
            Margin = 2
            Modified = False
            Options = [smoSyntaxHighlight, smoPrintWrap, smoPrintLineNos, smoPrintFilename, smoPrintDate, smoPrintPageNos, smoAutoIndent, smoTabToColumn, smoWordSelect, smoShowRMargin, smoShowGutter, smoShowWrapColumn, smoTitleAsFilename, smoBlockOverwriteCursor, smoShowWrapGlyph, smoColumnTrack]
            ReadOnly = False
            RightMargin = 80
            SaveFormat = sfTEXT
            SelStart = 0
            SelLength = 0
            SelTextColor = clWhite
            SelTextBack = clTeal
            TabDefault = 4
            TabOrder = 0
            Version = '2.01.17'
            VisiblePropEdPages = [ppOPTIONS, ppHIGHLIGHTING, ppKEYS, ppAUTOCORRECT, ppTEMPLATES]
            WrapAtColumn = 0
            OnChange = SyntaxMemo1Change
            OnDataDrop = SyntaxMemo1DataDrop
            ActiveParser = 1
          end
        end
        object CodeTemplateButton1: TButton
          Left = 16
          Top = 291
          Width = 65
          Height = 19
          Caption = 'Add'
          TabOrder = 4
          OnClick = CodeTemplateButton1Click
        end
        object CodeTemplateButton2: TButton
          Left = 104
          Top = 291
          Width = 65
          Height = 19
          Caption = 'Replace'
          TabOrder = 5
          OnClick = CodeTemplateButton2Click
        end
        object cteHotkey: THotKey
          Left = 296
          Top = 288
          Width = 121
          Height = 19
          HotKey = 32833
          InvalidKeys = [hcNone, hcShift]
          Modifiers = [hkAlt]
          TabOrder = 6
          OnExit = cteHotkeyExit
        end
      end
    end
  end
end